home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD ROM Paradise Collection 4
/
CD ROM Paradise Collection 4 1995 Nov.iso
/
os2
/
adaptor.zip
/
ADAPT.ZIP
/
adaptor
/
src
/
include
/
types.h
< prev
next >
Wrap
C/C++ Source or Header
|
1994-01-03
|
2KB
|
51 lines
# ifndef yyTypes
# define yyTypes
# if defined __STDC__ | defined __cplusplus
# define ARGS(parameters) parameters
# else
# define ARGS(parameters) ()
# endif
# ifndef bool
# define bool char
# endif
# include "Tree.h"
# include "Definiti.h"
# line 32 "Types.puma"
extern int TreeListLength ARGS((tTree t));
extern int TreeRank ARGS((tTree t));
extern int VarRank ARGS((tDefinitions v));
extern int ParameterVars ARGS((tTree t));
extern int TreeDistribution ARGS((tTree t));
extern int VarDistribution ARGS((tDefinitions v));
extern bool IsVarAllocatable ARGS((tDefinitions v));
extern bool IsVarCommon ARGS((tDefinitions v));
extern bool IsVarDummy ARGS((tDefinitions v));
extern bool IsVarOverlapped ARGS((tDefinitions v));
extern bool IsArrayOverlapped ARGS((tTree t));
extern bool IsPureObj ARGS((tDefinitions v));
extern tTree ArrayCompType ARGS((tDefinitions v));
extern tTree ArrayFormals ARGS((tDefinitions v));
extern tTree TreeType ARGS((tTree t));
extern tTree VarType ARGS((tDefinitions v));
extern int TreeSize ARGS((tTree t));
extern int VarSize ARGS((tDefinitions v));
extern tIdent TreeVarName ARGS((tTree var));
extern bool IsIntrFunc ARGS((tTree t));
extern bool IntrFuncKind1 ARGS((tIdent name));
extern bool IntrFuncKind2 ARGS((tIdent name));
extern bool IntrFuncKindn ARGS((tIdent name));
extern bool IntrFuncRed ARGS((tIdent name));
extern tTree LastIndex ARGS((tTree t));
extern void BeginTypes ();
extern void CloseTypes ();
# endif